﻿Namespace ResourceManager

    Public Class ResourceObjectBase

        Public Property Name() As String
        Public Property FileName() As String

        Public Sub New()
            Me.Name = ""
            Me.FileName = ""
        End Sub

        Public Sub New(ByVal name As String, ByVal fileName As String)
            Me.Name = name
            Me.FileName = fileName
        End Sub

    End Class

End Namespace